### file ：启动Oracle服务

@echo off
title 启动Oracle服务 
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
echo 正在启动OracleOraDb11g_home1TNSListener服务
net start "OracleOraDb11g_home1TNSListener"
echo 正在启动OracleServiceORCL服务
net start "OracleServiceORCL"

echo Oracle服务启动完成
pause




### file ：关闭Oracle服务

@echo off
@set now=时间%date% %time%
title 停止Oracle服务 
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit

echo 正在停止OracleOraDb11g_home1TNSListener服务
net stop "OracleOraDb11g_home1TNSListener"
echo 正在停止OracleServiceORCL服务
net stop "OracleServiceORCL"

echo Oracle服务已停止
echo . %now% 清理 . > D:\app\Administrator\diag\tnslsnr\WIN-S071GVS9B9B\listener\trace\listener.log

echo Ora 监听日志已清理
pause 